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القائمة بنية للبيانات تكون من مجموعه من العناصر من نفس النوع اهم خصائص القائمة قابلية 
النفاذ المباشر لاي عنصر كما تعالج تتابعيا 


كيفية التصريح بقائمة من بعد واحد 
NT‏ 
a[1]| a[2] a[3]| a[4]| a[5]| a[6]_ a[7]| a[8]| a[9] | a [10] |‏ | 


وارك ان قامقا ستل لي اساء اشخاص 
اصرح بها على النحو التالي 


a :array [1..10| of string ; 


program mat ; 
USES WINGrE ; 
yar 

i,m: integer; 
a:array [l1..1HHAJoF string: 


beqin | 
write "UIT iL : "I; 
readln in] ; تخذيد عذذ الأشخاصس‎ 


For i1i:=l to " do 
beqin 
rite" al" ,i,” J= "I; 
readln lali J1 ; 


TIKE] ======" J; 
For 1:=l to n do write" al" ,1,” =ل‎ ”",a]1 J11; 
end. . 


KI 
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a :array [1..2,1..4] of real ; 


في هذا المثال سنرى مصفوفة مربع ذات بعد اكبر من واحد 


tı Turbo Pascal ادا‎ × 


Fichier Editer Lhercher Exêcuter Lormpiler Options Fenêtre Aide 


2 a1 tp tpwtnaonarmeUu,. pa5 عا‎ |× 
uses Hincrt ; ا‎ 
1l 


yar 
i, integer; 

a:arraly l[1..1WA,1. . 1MA JaoaF integer; 
beqin 


For 1:=l to 3 do 
For j:=l to 3 do 
beqin 
wWCIEEL 2L" ,ir,”, 
readlnrali, JJ2; 
end; 


For 1:=l1l to 3 do 


beqin 
wWriteEln ي‎ 
For /J:=1 to 3 do 
write” | ",ali, JJ,’ II; 
end; | 


end. 
| | a 
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_ (Inactive E: TPWI TPN 
a]1,1[= 

a]1,2[= 
a[1,3 |= 
a]2.1[= 
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ل ٹا ب جل اا ہچ لد تت ت 
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تمرين الدرس 

أنشاء ثلاث مصفوفات 

وحدة لادخال اسم الشخص 

و وأحدة لاأدخال سنه 

و وأحدة لادخال جنسه 

حيث يتم الادخال و العرض بالترتيب 
اسم - سن - جنس 


http://pascal.eb2a.com/index.php?h=7.php 
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